﻿Module Module1
  Sub Main()

    Console.Write("Piattaforma: ")
    Console.WriteLine(
      My.Computer.Info.OSPlatform)
    Console.Write("Sistema operativo: ")
    Console.WriteLine(
      My.Computer.Info.OSFullName)
    Console.Write("Versione sistema operativo: ")
    Console.WriteLine(
      My.Computer.Info.OSVersion)
    Console.Write("Cultura UI: ")
    Console.WriteLine(
      My.Computer.Info.InstalledUICulture)
    Console.Write("Memoria fisica totale: ")
    Console.WriteLine(
      My.Computer.Info.TotalPhysicalMemory)
    Console.Write("Memoria fisica disponibile: ")
    Console.WriteLine(
      My.Computer.Info.AvailablePhysicalMemory)
    Console.Write("Memoria virtuale totale: ")
    Console.WriteLine(
      My.Computer.Info.TotalVirtualMemory)
    Console.Write("Memoria virtuale disponibile: ")
    Console.WriteLine(
      My.Computer.Info.AvailableVirtualMemory)
    Console.ReadLine()

  End Sub
End Module
